Komputer for Alle 2001 #16/2001 CD 16 (Black).iso/K-CS.DCR/00269.ls

Text File | 2001-10-25 | 277 b | 21 lines

global BlinkObjekt, Beskriv

on new me
  set BlinkObjekt to new(script "Blink")
end

on enterFrame
  checkBlink(BlinkObjekt)
end

on exitFrame
  go(#loop)
end

on keyDown
  if the key = RETURN then
    set Beskriv to the text of member "Beskrivelse"
    go(#next)
  end if
end